(setq frame-background-mode 'light)

(defun lutts-change-theme nil
  "To change my theme."
  (interactive)
  (defvar *lutts-light-theme* 'spacemacs-light)
  (defvar *lutts-dark-theme* 'atom-one-dark)
  (if (equal frame-background-mode 'light)
      (progn
        (load-theme *lutts-dark-theme*)
        (disable-theme *lutts-light-theme*)
        (setf frame-background-mode 'dark))
    (progn
      (load-theme *lutts-light-theme*)
      (disable-theme *lutts-dark-theme*)
      (setf frame-background-mode 'light))))

(defun lutts-init-change-theme nil
  (lutts-change-theme)
  (add-hook 'evil-leader-mode-hook 
            '(lambda ()
               (evil-leader/set-key "tl" 'lutts-change-theme))))

(lutts-load-package 'lutts-change-theme 'spacemacs-theme)

(provide 'change-theme-mode)
